home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1998 May / EnigmA AMIGA RUN 27 (1998)(G.R. Edizioni)(IT)[!][issue 1998-05].iso / earcd / giochi / myst-demo / demo_myst.aga < prev    next >
Text File  |  1998-03-11  |  801b  |  35 lines

  1. ; Set up paths
  2. C/Assign C: C ADD
  3. Assign Devs: Devs ADD
  4. Assign Libs: Libs ADD
  5.  
  6. ; Check if ENV:Sys/ahi.prefs is good enough
  7. If EXISTS ENV:Sys/ahi.prefs
  8.   Lab loop
  9.   CheckAHIPrefs ENV:Sys/ahi.prefs 0 > T:tmp.1
  10.   If WARN
  11.     RequestChoice >T:tmp.2 "Warning" "Your current AHI preferences are unsuitable because:*N`type T:tmp.1`" "Edit AHI preferences" "Use MYST preferences to play (recommended)" "I don't care, try to run MYST this way"
  12.     If `type T:tmp.2` EQ 1
  13.       Prefs/AHI
  14.       Skip loop BACK
  15.     EndIf
  16.     If `type T:tmp.2` EQ 2
  17.       Copy Env ENV: ALL QUIET
  18.     EndIf
  19.   EndIf
  20. Else
  21.   Copy Env ENV: ALL QUIET
  22. Endif
  23.  
  24. ; Launch Myst
  25. stack 30000 >NIL:
  26. DEMO_Myst_AGA.exe >NIL:
  27.  
  28.  
  29. ; Clean up
  30. Delete >NIL: T:tmp.?
  31. Assign Libs: Libs REMOVE
  32. Assign Devs: Devs REMOVE
  33. Assign C: C REMOVE
  34. C/Avail <>NIL: FLUSH
  35.